IF EXISTS (SELECT name  
           FROM  sysobjects 
           WHERE name = 'f_test_input' AND
                 type = 'P')
    DROP PROCEDURE dbo.f_test_input
GO

-- Procédure de test des chaînes de caractére entrées par l'utilisateur
-- retourne 0 si entrée invalide
-- retourne 1 si entrée valide
CREATE PROCEDURE f_test_input
    @str        AS VARCHAR(512)
AS
BEGIN
    IF @str IS NULL
        RETURN 1
    IF @str = ''
        RETURN 1

   RETURN -1
END
